﻿Imports Sy.Data

Public Class Cls_Content
    Inherits JsonObject(Of Cls_Content)
    Public Sub New() : End Sub

    Public Property Id As Integer
    Public Property FilePath As String
    Public Property Title As String
    Public Property Content As String

    Public Shared Function ReplaceWord(str As String, sa As String, sn As String, ra As String, rn As String) As String
        If (str.IsNullOrWhiteSpace) Then
            Return String.Empty
        End If

        Return str.Replace("[SA]", sa).Replace("[SN]", sn).Replace("[RA]", ra).Replace("[RN]", rn)
    End Function
End Class
